home *** CD-ROM | disk | FTP | other *** search
/ EuroCD 3 / EuroCD 3.iso / Programming / SecalDemo / Inc / libraries / gadtools.inc < prev    next >
Text File  |  1998-06-24  |  6KB  |  248 lines
  1. include "inc/exec/types.inc";
  2. include "inc/utility/tagitem.inc";
  3. include "inc/intuition/intuition.inc";
  4.  
  5. def GENERIC_KIND = 0;
  6. def BUTTON_KIND = 1;
  7. def CHECKBOX_KIND = 2;
  8. def INTEGER_KIND = 3;
  9. def LISTVIEW_KIND = 4;
  10. def MX_KIND = 5;
  11. def NUMBER_KIND = 6;
  12. def CYCLE_KIND = 7;
  13. def PALETTE_KIND = 8;
  14. def SCROLLER_KIND = 9;
  15.  
  16. def SLIDER_KIND = 11;
  17. def STRING_KIND = 12;
  18. def TEXT_KIND = 13;
  19.  
  20. def NUM_KINDS = 14;
  21.  
  22. def ARROWIDCMP = (IDCMP_GADGETUP|IDCMP_GADGETDOWN|IDCMP_INTUITICKS|IDCMP_MOUSEBUTTONS);
  23.  
  24. def BUTTONIDCMP = (IDCMP_GADGETUP);
  25. def CHECKBOXIDCMP = (IDCMP_GADGETUP);
  26. def INTEGERIDCMP = (IDCMP_GADGETUP);
  27. def LISTVIEWIDCMP = (IDCMP_GADGETUP|IDCMP_GADGETDOWN|IDCMP_MOUSEMOVE|ARROWIDCMP);
  28.  
  29. def MXIDCMP = (IDCMP_GADGETDOWN);
  30. def NUMBERIDCMP = (0);
  31. def CYCLEIDCMP = (IDCMP_GADGETUP);
  32. def PALETTEIDCMP = (IDCMP_GADGETUP);
  33.  
  34. def SCROLLERIDCMP = (IDCMP_GADGETUP|IDCMP_GADGETDOWN|IDCMP_MOUSEMOVE);
  35. def SLIDERIDCMP = (IDCMP_GADGETUP|IDCMP_GADGETDOWN|IDCMP_MOUSEMOVE);
  36. def STRINGIDCMP = (IDCMP_GADGETUP);
  37.  
  38. def TEXTIDCMP = (0);
  39.  
  40. struct NewGadget is
  41.   ng_LeftEdge,ng_TopEdge:word;
  42.   ng_Width,ng_Height:word;
  43.   ng_GadgetText:ulong;
  44.   ng_TextAttr:ulong;
  45.   ng_GadgetID:uword;
  46.   ng_Flags:ulong;
  47.   ng_VisualInfo:ulong;
  48.   ng_UserData:ulong;
  49. ;
  50.  
  51. def PLACETEXT_LEFT = $0001;
  52. def PLACETEXT_RIGHT = $0002;
  53. def PLACETEXT_ABOVE = $0004;
  54. def PLACETEXT_BELOW = $0008;
  55. def PLACETEXT_IN = $0010;
  56.  
  57. def NG_HIGHLABEL = $0020;
  58.  
  59. struct NewMenu is
  60.   nm_Type:ubyte;
  61.   nm_Label:ulong;
  62.   nm_CommKey:ulong;
  63.   nm_Flags:uword;
  64.   nm_MutualExclude:long;
  65.   nm_UserData:ulong;
  66. ;
  67.  
  68. def MENU_IMAGE = 128;
  69.  
  70. def NM_TITLE = 1;
  71. def NM_ITEM = 2;
  72. def NM_SUB = 3;
  73.  
  74. def IM_ITEM = (NM_ITEM|MENU_IMAGE);
  75. def IM_SUB = (NM_SUB|MENU_IMAGE);
  76.  
  77. def NM_END = 0;
  78.  
  79. def NM_IGNORE = 64;
  80.  
  81.  
  82. def NM_BARLABEL = -1;
  83.  
  84. def NM_MENUDISABLED = MENUENABLED;
  85. def NM_ITEMDISABLED = ITEMENABLED;
  86.  
  87. def NM_COMMANDSTRING = COMMSEQ;
  88.  
  89. def NM_FLAGMASK = (~(COMMSEQ|ITEMTEXT|HIGHFLAGS));
  90. def NM_FLAGMASK_V39 = (~(ITEMTEXT|HIGHFLAGS));
  91.  
  92. def GTMENU_TRIMMED = $00000001;
  93. def GTMENU_INVALID = $00000002;
  94. def GTMENU_NOMEM = $00000003;
  95.  
  96. def MX_WIDTH = 17;
  97. def MX_HEIGHT = 9;
  98.  
  99. def CHECKBOX_WIDTH = 26;
  100. def CHECKBOX_HEIGHT = 11;
  101.  
  102. def GT_TagBase = (TAG_USER+$80000);
  103.  
  104. def GTVI_NewWindow = (GT_TagBase+1);
  105. def GTVI_NWTags = (GT_TagBase+2);
  106.  
  107. def GT_Private0 = (GT_TagBase+3);
  108.  
  109. def GTCB_Checked = (GT_TagBase+4);
  110.  
  111. def GTLV_Top = (GT_TagBase+5);
  112. def GTLV_Labels = (GT_TagBase+6);
  113. def GTLV_ReadOnly = (GT_TagBase+7);
  114. def GTLV_ScrollWidth = (GT_TagBase+8);
  115.  
  116. def GTMX_Labels = (GT_TagBase+9);
  117. def GTMX_Active = (GT_TagBase+10);
  118.  
  119. def GTTX_Text = (GT_TagBase+11);
  120. def GTTX_CopyText = (GT_TagBase+12);
  121.  
  122. def GTNM_Number = (GT_TagBase+13);
  123.  
  124. def GTCY_Labels = (GT_TagBase+14);
  125. def GTCY_Active = (GT_TagBase+15);
  126.  
  127. def GTPA_Depth = (GT_TagBase+16);
  128. def GTPA_Color = (GT_TagBase+17);
  129. def GTPA_ColorOffset = (GT_TagBase+18);
  130. def GTPA_IndicatorWidth = (GT_TagBase+19);
  131. def GTPA_IndicatorHeight = (GT_TagBase+20);
  132.  
  133. def GTSC_Top = (GT_TagBase+21);
  134. def GTSC_Total = (GT_TagBase+22);
  135. def GTSC_Visible = (GT_TagBase+23);
  136. def GTSC_Overlap = (GT_TagBase+24);
  137.  
  138. def GTSL_Min = (GT_TagBase+38);
  139. def GTSL_Max = (GT_TagBase+39);
  140. def GTSL_Level = (GT_TagBase+40);
  141. def GTSL_MaxLevelLen = (GT_TagBase+41);
  142. def GTSL_LevelFormat = (GT_TagBase+42);
  143. def GTSL_LevelPlace = (GT_TagBase+43);
  144. def GTSL_DispFunc = (GT_TagBase+44);
  145.  
  146. def GTST_String = (GT_TagBase+45);
  147. def GTST_MaxChars = (GT_TagBase+46);
  148.  
  149. def GTIN_Number = (GT_TagBase+47);
  150. def GTIN_MaxChars = (GT_TagBase+48);
  151.  
  152. def GTMN_TextAttr = (GT_TagBase+49);
  153. def GTMN_FrontPen = (GT_TagBase+50);
  154.  
  155. def GTBB_Recessed = (GT_TagBase+51);
  156.  
  157. def GT_VisualInfo = (GT_TagBase+52);
  158.  
  159. def GTLV_ShowSelected = (GT_TagBase+53);
  160. def GTLV_Selected = (GT_TagBase+54);
  161. def GT_Reserved1 = (GT_TagBase+56);
  162.  
  163. def GTTX_Border = (GT_TagBase+57);
  164. def GTNM_Border = (GT_TagBase+58);
  165.  
  166. def GTSC_Arrows = (GT_TagBase+59);
  167.  
  168. def GTMN_Menu = (GT_TagBase+60);
  169. def GTMX_Spacing = (GT_TagBase+61);
  170.  
  171. def GTMN_FullMenu = (GT_TagBase+62);
  172. def GTMN_SecondaryError = (GT_TagBase+63);
  173. def GT_Underscore = (GT_TagBase+64);
  174. def GTST_EditHook = (GT_TagBase+55);
  175. def GTIN_EditHook = (GTST_EditHook);
  176.  
  177. def GTMN_Checkmark = (GT_TagBase+65);
  178. def GTMN_AmigaKey = (GT_TagBase+66);
  179. def GTMN_NewLookMenus = (GT_TagBase+67);
  180.  
  181. def GTCB_Scaled = (GT_TagBase+68);
  182. def GTMX_Scaled = (GT_TagBase+69);
  183.  
  184. def GTPA_NumColors = (GT_TagBase+70);
  185.  
  186. def GTMX_TitlePlace = (GT_TagBase+71);
  187.  
  188. def GTTX_FrontPen = (GT_TagBase+72);
  189. def GTTX_BackPen = (GT_TagBase+73);
  190. def GTTX_Justification = (GT_TagBase+74);
  191.  
  192. def GTNM_FrontPen = (GT_TagBase+72);
  193. def GTNM_BackPen = (GT_TagBase+73);
  194. def GTNM_Justification = (GT_TagBase+74);
  195. def GTNM_Format = (GT_TagBase+75);
  196. def GTNM_MaxNumberLen = (GT_TagBase+76);
  197.  
  198. def GTBB_FrameType = (GT_TagBase+77);
  199.  
  200. def GTLV_MakeVisible = (GT_TagBase+78);
  201. def GTLV_ItemHeight = (GT_TagBase+79);
  202.  
  203. def GTSL_MaxPixelLen = (GT_TagBase+80);
  204. def GTSL_Justification = (GT_TagBase+81);
  205.  
  206. def GTPA_ColorTable = (GT_TagBase+82);
  207.  
  208. def GTLV_CallBack = (GT_TagBase+83);
  209. def GTLV_MaxPen = (GT_TagBase+84);
  210.  
  211. def GTTX_Clipped = (GT_TagBase+85);
  212. def GTNM_Clipped = (GT_TagBase+85);
  213.  
  214. def GTJ_LEFT = 0;
  215. def GTJ_RIGHT = 1;
  216. def GTJ_CENTER = 2;
  217.  
  218. def BBFT_BUTTON = 1;
  219. def BBFT_RIDGE = 2;
  220. def BBFT_ICONDROPBOX = 3;
  221.  
  222. def INTERWIDTH = 8;
  223. def INTERHEIGHT = 4;
  224.  
  225. def NWAY_KIND = CYCLE_KIND;
  226. def NWAYIDCMP = CYCLEIDCMP;
  227. def GTNW_Labels = GTCY_Labels;
  228. def GTNW_Active = GTCY_Active;
  229.  
  230. def LV_DRAW = $202;
  231.  
  232. def LVCB_OK = 0;
  233. def LVCB_UNKNOWN = 1;
  234.  
  235. def LVR_NORMAL = 0;
  236. def LVR_SELECTED = 1;
  237. def LVR_NORMALDISABLED = 2;
  238. def LVR_SELECTEDDISABLED = 8;
  239.  
  240. struct LVDrawMsg is
  241.   lvdm_MethodID:ulong;
  242.   lvdm_RastPort:ulong;
  243.   lvdm_DrawInfo:ulong;
  244.   lvdm_Bounds:Rectangle;
  245.   lvdm_State:ulong;
  246. ;
  247.  
  248.